﻿Imports System.Windows.Forms

Public Class Commerce
    Private Sub Commerce_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        My.Forms.Blank.MdiParent = Me
        My.Forms.AManufacturers.MdiParent = Me
        My.Forms.DManufacturers.MdiParent = Me
        My.Forms.MManufacturers.MdiParent = Me
        My.Forms.CManufacturers.MdiParent = Me
        My.Forms.AProducts.MdiParent = Me
        My.Forms.DProducts.MdiParent = Me
        My.Forms.MProducts.MdiParent = Me
        My.Forms.CProducts.MdiParent = Me
        My.Forms.Blank.Show()
    End Sub

    Private Sub AddToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddToolStripMenuItem.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.AProducts.Show()
    End Sub

    Private Sub DeleteToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DeleteToolStripMenuItem.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.DProducts.Show()
    End Sub

    Private Sub ModifyToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ModifyToolStripMenuItem.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.MProducts.Show()
    End Sub

    Private Sub CheckToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckToolStripMenuItem1.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.CProducts.Show()
    End Sub

    Private Sub AddToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddToolStripMenuItem1.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.AManufacturers.Show()
    End Sub

    Private Sub DeleteToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DeleteToolStripMenuItem1.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.DManufacturers.Show()
    End Sub

    Private Sub ModifyToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ModifyToolStripMenuItem1.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.MManufacturers.Show()
    End Sub

    Private Sub CheckToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckToolStripMenuItem.Click
        Me.ActiveMdiChild.Hide()
        My.Forms.CManufacturers.Show()
    End Sub

End Class
